home *** CD-ROM | disk | FTP | other *** search
Text File | 1990-02-27 | 788 b | 20 lines | [TEXT/MPS ] |
- File #1: Roy G. Biv:C TCL patch ƒ:new files:TBUtilities.c
- File #2: Roy G. Biv:C TCL patch ƒ:old files:TBUtilities.c
-
- Nonmatching lines (File "Roy G. Biv:C TCL patch ƒ:new files:TBUtilities.c"; Line 260:268; File "Roy G. Biv:C TCL patch ƒ:old files:TBUtilities.c"; Line 260:261)
- 260 /* Altered by TCL Weaver version 1.0 (2/21/90) */
- 261
- 262 short charsToCopy;
- 263
- 264 /* Truncate if concatenated string would be longer than 255 chars. */
- 265
- 266 charsToCopy = Min(second[0], 255 - first[0]);
- 267 BlockMove(second + 1, first + first[0] + 1, (long) charsToCopy);
- 268 first[0] += charsToCopy;
-
- 260 BlockMove(second + 1, first + first[0] + 1, (long) second[0]);
- 261 first[0] += second[0];
-
-
- *** EOF on both files at the same time ***
-